<?php

header ("Last-Modified: " . gmdate("D,d M YH:i:s") . " GMT");
header ("Cache-Control: no-cache, must-revalidate");
header ("Pragma: no-cache");
header ("Content-Type: application/vnd.ms-excel");
header ("Content-Disposition: attachment; filename=facturasXrecaudos.xls" );

include_once ("../funciones.php");
$fechaIni   = ($_REQUEST['fechaini'] != "")?$_REQUEST['fechaini']:'1986-01-01';
$fechaFin   = ($_REQUEST['fechaFin'] != "")?$_REQUEST['fechaFin']:'2999-01-01';
$nit        = $_REQUEST['nit'];
$factura    = $_REQUEST['factura'];
$sucursal   = $_REQUEST['sucursal'];
//Se construye la condicion
$where = ($nit != "")?" and fac.cliente = '$nit'":"";
$where .= ($factura != "")?" and fac.factura = '$factura'":"";
$where1 = ($sucursal != "")?" and fac.sucursal = '$sucursal'":"";

$link_caweb = con_caweb();
//(fac.cuadre_base - fac.iva - fac.retefuente - fac.reteiva - fac.reteica) as recaudoBase,
$sql = "select fac.facturasistema,abo.fechaabono,fac.sucursal,fac.fechapago,fac.factura,fac.fechafactura,fac.base,fac.iva,fac.total,fac.nombre,fac.retefuente,fac.reteiva,fac.reteica,fac.otros,fac.cuadre,fac.cuadre_base,abo.valor as valorpagado,fac.observacioncartera,
        fac.estadocartera,rec.tipo,rec.banco,rec.cuenta,rec.cheque from recaudos rec
        inner join abonosfacturacion abo on abo.recaudo = rec.recaudo
        inner join cabeceras_fac fac on fac.facturasistema = abo.facturasistema and fac.factura <> 0 and fac.estado != 'A' $where
        where rec.fecharecaudo between '$fechaIni' and '$fechaFin' $where1";
$result	=	mysql_query($sql,$link_caweb);
echo "Sucursal \t FechaPago \t Factura \t FechaFactura \t Cliente \t Base \t IVA \t Total Factura \t Retefuente \t ReteIva \t  ReteIca \t Otros \t  Recaudo  \t  Observacion \t  EstadoCartera \t  FormadePago \t  Banco \t  Cuenta \t  Cheque \n";
while($row = mysql_fetch_array($result)){
    $tmp = limpiaTexto2($row['observacioncartera']);
	echo "$row[sucursal] \t $row[fechaabono] \t $row[factura] \t $row[fechafactura] \t $row[nombre] \t $row[base] \t $row[iva] \t $row[total] \t $row[retefuente] \t $row[reteiva] \t $row[reteica] \t $row[otros]  \t $row[valorpagado]  \t $tmp  \t $row[estadocartera] \t $row[tipo]  \t $row[banco]  \t $row[cuenta]  \t $row[cheque] \n";
}

function limpiaTexto2($parrafo){
    $consalto = split("\n", $parrafo);
    $texto = "";
    foreach($consalto as $frase){
        $texto .= trim($frase)." ";
    }
    return trim($texto);
}


?>

